Different plots using different functions in ggplot2 library in R. Using the movies dataset for this visualization.

Dataset Reference: https://sds-platform-private.s3-us-east-2.amazonaws.com/uploads/P2-Movie-Ratings.csv

movies<-read.csv("P2-Movie-Ratings.csv")
colnames(movies)<-c("Film","Genre","CriticRating","AudienceRating","BudgetMillion","Year")
library("ggplot2")
q<-ggplot(data=movies,aes(x=CriticRating,y=AudienceRating,color=Genre,size=BudgetMillion))
q+geom_point()

q+geom_jitter()

q+geom_rug(sides="bl")

q+geom_smooth()

q+geom_text(aes(label=CriticRating))

q+geom_hex()

q+geom_density2d()

q+geom_bin2d(binwidth = c(5, 0.5))

s<-ggplot(data = movies,aes(x=BudgetMillion))
s+geom_histogram(binwidth = 10,aes(fill=Genre),color="black")

#two variable trend curve
t<-ggplot(data=movies,aes(y=AudienceRating,x=CriticRating,color=Genre))
t+geom_point()+geom_smooth(fill=NA)

u<-ggplot(data=movies,aes(x=Genre,y=AudienceRating,color=Genre))
u+geom_boxplot()

v<-ggplot(data=movies,aes(x=BudgetMillion))
v+geom_histogram(binwidth = 10,aes(fill=Genre),color="Black") + facet_grid(Genre~.,scales = "free")

o<-ggplot(data=movies,aes(x=BudgetMillion))
o+geom_area(stat="bin")

o+geom_density(kernel="gaussian")

o+geom_freqpoly()

o+geom_bar()

o+geom_histogram(binwidth = 5)

o+geom_dotplot()

#single variable histogram
t<-ggplot(data=movies,aes(x=AudienceRating))
t+geom_histogram(binwidth = 10,fill="White",color="Black")

#single variable density plot
s+geom_density(aes(fill=Genre),position="Stack")

d<-ggplot(data=movies,aes(x=CriticRating,y=AudienceRating,z=Genre))
d + geom_tile(aes(fill = Genre), hjust=0.5, vjust=0.5, interpolate=FALSE)
Ignoring unknown parameters: hjust, vjust, interpolate

g<-ggplot(data=movies,aes(x=CriticRating))
r<-g+geom_bar()
r+coord_cartesian(xlim = c(0,5))

r+coord_flip()

r + coord_fixed(ratio = 1/2)

r + coord_polar(theta = "x", direction=1 )

r + coord_trans(y = "sqrt")

r + coord_map(projection = "ortho",orientation=c(40, 40, 0))

g+geom_bar(position = "dodge")

f<- ggplot(data=movies, aes(x=CriticRating,y=AudienceRating))
f+geom_point(position = "jitter")

f+geom_ribbon(aes(ymin=AudienceRating-20,ymax=AudienceRating+20))

LS0tCnRpdGxlOiAiTW92aWUgRGF0YXNldCBHR1Bsb3QgTm90ZWJvb2siCm91dHB1dDogaHRtbF9ub3RlYm9vawotLS0KCkRpZmZlcmVudCBwbG90cyB1c2luZyBkaWZmZXJlbnQgZnVuY3Rpb25zIGluIGdncGxvdDIgbGlicmFyeSBpbiBSLgpVc2luZyB0aGUgbW92aWVzIGRhdGFzZXQgZm9yIHRoaXMgdmlzdWFsaXphdGlvbi4KCkRhdGFzZXQgUmVmZXJlbmNlOiBodHRwczovL3Nkcy1wbGF0Zm9ybS1wcml2YXRlLnMzLXVzLWVhc3QtMi5hbWF6b25hd3MuY29tL3VwbG9hZHMvUDItTW92aWUtUmF0aW5ncy5jc3YKCmBgYHtyfQptb3ZpZXM8LXJlYWQuY3N2KCJQMi1Nb3ZpZS1SYXRpbmdzLmNzdiIpCmBgYApgYGB7cn0KY29sbmFtZXMobW92aWVzKTwtYygiRmlsbSIsIkdlbnJlIiwiQ3JpdGljUmF0aW5nIiwiQXVkaWVuY2VSYXRpbmciLCJCdWRnZXRNaWxsaW9uIiwiWWVhciIpCmBgYApgYGB7cn0KbGlicmFyeSgiZ2dwbG90MiIpCnE8LWdncGxvdChkYXRhPW1vdmllcyxhZXMoeD1Dcml0aWNSYXRpbmcseT1BdWRpZW5jZVJhdGluZyxjb2xvcj1HZW5yZSxzaXplPUJ1ZGdldE1pbGxpb24pKQpxK2dlb21fcG9pbnQoKQpgYGAKCgpgYGB7cn0KcStnZW9tX2ppdHRlcigpCmBgYApgYGB7cn0KcStnZW9tX3J1ZyhzaWRlcz0iYmwiKQpgYGAKYGBge3J9CnErZ2VvbV9zbW9vdGgoKQpgYGAKYGBge3J9CnErZ2VvbV90ZXh0KGFlcyhsYWJlbD1Dcml0aWNSYXRpbmcpKQpgYGAKYGBge3J9CnErZ2VvbV9oZXgoKQpgYGAKYGBge3J9CnErZ2VvbV9kZW5zaXR5MmQoKQpgYGAKYGBge3J9CnErZ2VvbV9iaW4yZChiaW53aWR0aCA9IGMoNSwgMC41KSkKYGBgCmBgYHtyfQpzPC1nZ3Bsb3QoZGF0YSA9IG1vdmllcyxhZXMoeD1CdWRnZXRNaWxsaW9uKSkKcytnZW9tX2hpc3RvZ3JhbShiaW53aWR0aCA9IDEwLGFlcyhmaWxsPUdlbnJlKSxjb2xvcj0iYmxhY2siKQpgYGAKYGBge3J9CiN0d28gdmFyaWFibGUgdHJlbmQgY3VydmUKdDwtZ2dwbG90KGRhdGE9bW92aWVzLGFlcyh5PUF1ZGllbmNlUmF0aW5nLHg9Q3JpdGljUmF0aW5nLGNvbG9yPUdlbnJlKSkKdCtnZW9tX3BvaW50KCkrZ2VvbV9zbW9vdGgoZmlsbD1OQSkKYGBgCmBgYHtyfQp1PC1nZ3Bsb3QoZGF0YT1tb3ZpZXMsYWVzKHg9R2VucmUseT1BdWRpZW5jZVJhdGluZyxjb2xvcj1HZW5yZSkpCnUrZ2VvbV9ib3hwbG90KCkKYGBgCmBgYHtyfQp2PC1nZ3Bsb3QoZGF0YT1tb3ZpZXMsYWVzKHg9QnVkZ2V0TWlsbGlvbikpCnYrZ2VvbV9oaXN0b2dyYW0oYmlud2lkdGggPSAxMCxhZXMoZmlsbD1HZW5yZSksY29sb3I9IkJsYWNrIikgKyBmYWNldF9ncmlkKEdlbnJlfi4sc2NhbGVzID0gImZyZWUiKQpgYGAKCgpgYGB7cn0KbzwtZ2dwbG90KGRhdGE9bW92aWVzLGFlcyh4PUJ1ZGdldE1pbGxpb24pKQpvK2dlb21fYXJlYShzdGF0PSJiaW4iKQpgYGAKYGBge3J9Cm8rZ2VvbV9kZW5zaXR5KGtlcm5lbD0iZ2F1c3NpYW4iKQpgYGAKYGBge3J9Cm8rZ2VvbV9mcmVxcG9seSgpCmBgYApgYGB7cn0KbytnZW9tX2JhcigpCmBgYApgYGB7cn0KbytnZW9tX2hpc3RvZ3JhbShiaW53aWR0aCA9IDUpCmBgYApgYGB7cn0KbytnZW9tX2RvdHBsb3QoKQpgYGAKYGBge3J9CiNzaW5nbGUgdmFyaWFibGUgaGlzdG9ncmFtCnQ8LWdncGxvdChkYXRhPW1vdmllcyxhZXMoeD1BdWRpZW5jZVJhdGluZykpCnQrZ2VvbV9oaXN0b2dyYW0oYmlud2lkdGggPSAxMCxmaWxsPSJXaGl0ZSIsY29sb3I9IkJsYWNrIikKYGBgCmBgYHtyfQojc2luZ2xlIHZhcmlhYmxlIGRlbnNpdHkgcGxvdApzK2dlb21fZGVuc2l0eShhZXMoZmlsbD1HZW5yZSkscG9zaXRpb249IlN0YWNrIikKYGBgCmBgYHtyfQpkPC1nZ3Bsb3QoZGF0YT1tb3ZpZXMsYWVzKHg9Q3JpdGljUmF0aW5nLHk9QXVkaWVuY2VSYXRpbmcsej1HZW5yZSkpCmQgKyBnZW9tX3RpbGUoYWVzKGZpbGwgPSBHZW5yZSksIGhqdXN0PTAuNSwgdmp1c3Q9MC41LCBpbnRlcnBvbGF0ZT1GQUxTRSkKYGBgCmBgYHtyfQpnPC1nZ3Bsb3QoZGF0YT1tb3ZpZXMsYWVzKHg9Q3JpdGljUmF0aW5nKSkKcjwtZytnZW9tX2JhcigpCnIrY29vcmRfY2FydGVzaWFuKHhsaW0gPSBjKDAsNSkpCmBgYApgYGB7cn0Kcitjb29yZF9mbGlwKCkKYGBgCmBgYHtyfQpyICsgY29vcmRfZml4ZWQocmF0aW8gPSAxLzIpCmBgYApgYGB7cn0KciArIGNvb3JkX3BvbGFyKHRoZXRhID0gIngiLCBkaXJlY3Rpb249MSApCmBgYApgYGB7cn0KciArIGNvb3JkX3RyYW5zKHkgPSAic3FydCIpCmBgYApgYGB7cn0KciArIGNvb3JkX21hcChwcm9qZWN0aW9uID0gIm9ydGhvIixvcmllbnRhdGlvbj1jKDQwLCA0MCwgMCkpCmBgYApgYGB7cn0KZytnZW9tX2Jhcihwb3NpdGlvbiA9ICJkb2RnZSIpCmBgYApgYGB7cn0KZjwtIGdncGxvdChkYXRhPW1vdmllcywgYWVzKHg9Q3JpdGljUmF0aW5nLHk9QXVkaWVuY2VSYXRpbmcpKQpmK2dlb21fcG9pbnQocG9zaXRpb24gPSAiaml0dGVyIikKYGBgCmBgYHtyfQpmK2dlb21fcmliYm9uKGFlcyh5bWluPUF1ZGllbmNlUmF0aW5nLTIwLHltYXg9QXVkaWVuY2VSYXRpbmcrMjApKQpgYGAKCg==